home *** CD-ROM | disk | FTP | other *** search
/ Collection of Internet / Collection of Internet.iso / winprogs / ws_ping / ws_ping.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-10-03  |  17.0 KB  |  546 lines
  1. /*************************************************************************
  2.  Windows Sockets PING Client Application
  3.  
  4.  Written by John A. Junod, 267 Hillwood St., Martinez, GA, 30907 93.10.01
  5.  <junodj@gordon-emh2.army.mil> <zj8549@trotter.usma.edu>     C$:72321,366
  6.  
  7.  Released into the public domain with no restrictions other than to give
  8.  me some of the credit if you use this code in other applications.  Some
  9.  code concepts based on code published in UNIX Network Programming by
  10.  W. Richard Stevens or on BSD networking source code.
  11.  
  12.  Note that MOST Windows Sockets DLL's do not support RAW_SOCKETS.  This
  13.  does work with Trumpet's Windows Sockets DLL Alpha 15.
  14.  
  15.  Purpose of this program was to see how a PING program could be implemented
  16.  under Windows Sockets.  This program uses either blocking or async
  17.  socket calls to perform its magic.  
  18. *************************************************************************/
  19.  
  20. //----------------------
  21. #include "ws_glob.h"
  22. #include "WS_ping.H"
  23. #include "ip_icmp.h"
  24. //----------------------
  25.  
  26. BOOL bSpecified=FALSE;
  27.  
  28. int nPktLength=50;
  29. int nNumPkts=10;
  30. int nTimeOut=10;
  31. extern int nTransmitted,nReceived;
  32.  
  33. int PASCAL WinMain(HANDLE hInstance, HANDLE hPrevInstance,
  34.                    LPSTR lpszCmdLine, int nCmdShow)
  35. {
  36.   MSG        msg;           // MSG structure to store your messages
  37.   int        nRc;           // return value from Register Classes
  38.   long       nWndunits;     // window units for size and location
  39.   int        nX;            // the resulting starting point (x, y)
  40.   int        nY;
  41.   int        nWidth;        // the resulting width and height for this
  42.   int        nHeight;       // window
  43.   int        err;
  44.  
  45.   strcpy(szAppName, "WS_PING");
  46.   hInst = hInstance;
  47.   if(!hPrevInstance)
  48.   {
  49.     if ((nRc = nCwRegisterClasses()) == -1)
  50.     {
  51.       MessageBox(NULL, "Window creation failed", NULL, MB_ICONEXCLAMATION);
  52.       return nRc;    
  53.     }
  54.   }
  55.  
  56.   // Create a device independant size and location
  57.   nWndunits = GetDialogBaseUnits();
  58.   nWndx = LOWORD(nWndunits);
  59.   nWndy = HIWORD(nWndunits);
  60.   nX = ((18 * nWndx) / 4);
  61.   nY = ((18 * nWndy) / 8);
  62.   nWidth = ((247 * nWndx) / 4);
  63.   nHeight = ((218 * nWndy) / 8);
  64.  
  65.   // create application's Main window
  66.   hWndMain = CreateWindow(
  67.     szAppName, "WinSock_PING",
  68.     WS_CAPTION     | WS_SYSMENU    | WS_MINIMIZEBOX  |
  69.     WS_MAXIMIZEBOX | WS_THICKFRAME | WS_CLIPCHILDREN | WS_OVERLAPPED,
  70.     nX,nY, nWidth, nHeight,
  71.     NULL, NULL, hInst,  NULL);
  72.  
  73.   if(hWndMain == NULL)
  74.   {
  75.     MessageBox(NULL, "Error registering class", NULL, MB_ICONEXCLAMATION);
  76.     return 2;
  77.   }
  78.  
  79.   if(lstrlen((LPSTR)lpszCmdLine)>0) {
  80.     bSpecified=TRUE;
  81.     strcpy(szRemoteHost,lpszCmdLine);
  82.   }
  83.  
  84.   if (err = WSAStartup( 0x0101, &WSAData))  // register task with
  85.   {                                         // winsock tcp/ip API
  86.     ReportWSError(err);            
  87.   } else {
  88.     GetLocalInfo();
  89.     ShowWindow(hWndMain, nCmdShow);         // display main window
  90.     while(GetMessage(&msg, NULL, 0, 0))     // Until WM_QUIT message
  91.     {
  92.       TranslateMessage(&msg);
  93.       DispatchMessage(&msg);
  94.     }
  95.     WSACleanup();
  96.     ReleaseDisplayMem();
  97.   }
  98.   // Do clean up before exiting from the application
  99.   CwUnRegisterClasses();
  100.   return msg.wParam;
  101. }
  102.  
  103. #define WM_RESETCURSOR WM_USER+10
  104.  
  105. // Main window message processing
  106. LONG FAR PASCAL WndProc(HWND hWnd,WORD Message,WORD wParam,LONG lParam)
  107. {
  108.   int nIndex,nRC,nBytesRecv;
  109.   static int saFromAddrLen;
  110.   static struct sockaddr_in saDestAddr;
  111.   static struct sockaddr_in saFromAddr;
  112.   static struct hostent  HostEntry , *pHostEntry;
  113.   static struct protoent ProtoEntry, *pProtoEntry;
  114.   static HANDLE hATHhost;
  115.   static HANDLE hATHprot;
  116.  
  117.   switch (Message)
  118.   {
  119.     case WM_CREATE:
  120.       hStdCursor=LoadCursor(NULL,IDC_ARROW);
  121.       hWaitCursor=LoadCursor(NULL,IDC_WAIT);
  122.       if(!bSpecified)
  123.         GetPrivateProfileString("WS_PING", "HOSTNAME",
  124.           "129.29.64.246",szRemoteHost,79,szIniFile);
  125.       else
  126.         PostMessage(hWnd,WM_COMMAND,IDM_ASYNC_CONNECT,0L);
  127.       break;
  128.  
  129.     case WM_TIMER:
  130.       switch(wParam) {
  131.         case 10:
  132.           DoPrintf("[Timer-TIMEOUT] ");
  133.           KillTimer(hWnd,10);
  134.           if(WSAIsBlocking()) {
  135.             bAborted=TRUE;
  136.             WSACancelBlockingCall();
  137.           }
  138.           break;
  139.  
  140.         case 20:
  141.           DoPrintf("[Timer-ASYNC_SEND] ");
  142.           if(nTransmitted<nNumPkts) {
  143.             send_ping(ping_socket,&saDestAddr,szMsgBuf,
  144.                       nPktLength+SIZE_ICMP_HDR);
  145.             PostMessage(hWnd,WM_PING_RECEIVE,0,0l);
  146.           } else {
  147.             KillTimer(hWnd,20);
  148.             if(nReceived!=nTransmitted)
  149.               SendMessage(hWnd,WM_PING_RECEIVE,0,0l);
  150.             PostMessage(hWnd,WM_PING_FINISH,0,0l);
  151.           }
  152.           break;
  153.  
  154.         case 30:
  155.           DoPrintf("[Timer-BLOCK_SEND] ");
  156.           if(nTransmitted<nNumPkts)
  157.           {
  158.             if(send_ping(ping_socket,&saDestAddr,szMsgBuf,
  159.                       nPktLength+SIZE_ICMP_HDR))
  160.               recv_ping(ping_socket,szString,TRUE);
  161.           }
  162.           else {
  163.             KillTimer(hWnd,30);
  164.             if(nReceived!=nTransmitted)
  165.               recv_ping(ping_socket,szString,TRUE);
  166.             PostMessage(hWnd,WM_PING_FINISH,0,0l);
  167.           }
  168.           break;
  169.  
  170.         default:
  171.           KillTimer(hWnd,wParam);
  172.           break;
  173.       }
  174.       break;
  175.     case WM_COMMAND:
  176.       if(wParam==IDM_CLOSE || wParam==IDM_EXIT) {
  177.         if(ping_socket!=INVALID_SOCKET) {
  178.           ping_socket=DoClose(ping_socket);
  179.           SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  180.         }
  181.         if(wParam==IDM_EXIT)
  182.           SendMessage(hWnd,WM_CLOSE,0,0L);
  183.         break;
  184.       } else if(bCmdInProgress) return(FALSE);
  185.       switch (wParam)
  186.       {
  187.         case IDM_ASYNC_CONNECT:
  188.           bCmdInProgress=1;
  189.           if(!bSpecified)
  190.             { FARPROC lpfnMsgProc;
  191.               lpfnMsgProc=MakeProcInstance((FARPROC)WS_HostMsgProc,hInst);
  192.               DialogBox(hInst,(LPSTR)"DLG_HOST",hWnd,lpfnMsgProc);
  193.               FreeProcInstance(lpfnMsgProc);
  194.             }
  195.           bSpecified=FALSE;
  196.           memset(&saDestAddr,0,sizeof(struct sockaddr_in));
  197.           memset(&HostEntry,0,sizeof(struct hostent));
  198.           memset(&ProtoEntry,0,sizeof(struct protoent));
  199.           saDestAddr.sin_family=AF_INET;
  200.           if((saDestAddr.sin_addr.s_addr=inet_addr(szRemoteHost))==INADDR_NONE)
  201.             hATHhost=WSAAsyncGetHostByName(hWnd,WM_PING_HOST,szRemoteHost,
  202.                         szMsgBuf,MAXGETHOSTSTRUCT);
  203.           else hATHhost=0;
  204.           hATHprot=WSAAsyncGetProtoByName(hWnd,WM_PING_PROTO,"icmp",
  205.                         &szMsgBuf[MAXGETHOSTSTRUCT],MAXGETHOSTSTRUCT);
  206.           break;
  207.  
  208.         case IDM_CONNECT:
  209.           bCmdInProgress=1;
  210.           if(!bSpecified)
  211.             { FARPROC lpfnMsgProc;
  212.               lpfnMsgProc=MakeProcInstance((FARPROC)WS_HostMsgProc,hInst);
  213.               DialogBox(hInst,(LPSTR)"DLG_HOST",hWnd,lpfnMsgProc);
  214.               FreeProcInstance(lpfnMsgProc);
  215.             }
  216.           bSpecified=FALSE;
  217.           memset(&saDestAddr,0,sizeof(struct sockaddr));
  218.           saDestAddr.sin_family=AF_INET;
  219.           if((saDestAddr.sin_addr.s_addr=inet_addr(szRemoteHost))==INADDR_NONE)
  220.           {
  221.             if((pHostEntry=gethostbyname(szRemoteHost)))
  222.               memcpy(&saDestAddr.sin_addr,pHostEntry->h_addr,
  223.                      pHostEntry->h_length);
  224.             else {
  225.               DoPrintf("can't get \"%s\" host entry.",szRemoteHost);
  226.               SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  227.               break;
  228.             }
  229.           }
  230.           if((pProtoEntry=getprotobyname("icmp"))==NULL) {
  231.             DoPrintf("unknown protocol: icmp");
  232.             SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  233.             break; 
  234.           }
  235.           if((ping_socket=socket(saDestAddr.sin_family,SOCK_RAW,
  236.               pProtoEntry->p_proto)) ==INVALID_SOCKET)
  237.           {
  238.             DoPrintf("can't create raw socket %s",
  239.                       ReturnWSError(WSAGetLastError(),NULL));
  240.             SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  241.             break;
  242.           }
  243.           nTransmitted=0; nReceived=0;
  244.           DoPrintf("[%u] raw socket created",ping_socket);
  245.           PrintHeader(&saDestAddr,nPktLength);
  246.           SetTimer(hWnd,30,1000,NULL);
  247.           break;
  248.  
  249.         case IDM_ABOUT:
  250.           { FARPROC lpfnMsgProc;
  251.             lpfnMsgProc = MakeProcInstance((FARPROC)WS_AboutMsgProc, hInst); 
  252.             DialogBox(hInst, (LPSTR)"DLG_ABOUT", hWnd, lpfnMsgProc);
  253.             FreeProcInstance(lpfnMsgProc);
  254.           }
  255.           break;
  256.  
  257.         default:
  258.           return DefWindowProc(hWnd, Message, wParam, lParam);
  259.       }
  260.       break;
  261.  
  262.     case WM_PING_HOST:
  263.       DoPrintf("[WM_PING_HOST] ");
  264.       if(WSAGETASYNCERROR(lParam)!=0) {
  265.         ReportWSError(WSAGETASYNCERROR(lParam));
  266.         SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  267.       } else {
  268.         memcpy(&HostEntry,szMsgBuf,sizeof(struct hostent));
  269.         memcpy(&saDestAddr.sin_addr,HostEntry.h_addr,HostEntry.h_length);
  270.         hATHhost=0;
  271.         if(hATHprot==0) SendMessage(hWnd,WM_PING_CAS,0,0l);
  272.       }
  273.       break;
  274.  
  275.     case WM_PING_PROTO:
  276.       DoPrintf("[WM_PING_PROTO] ");
  277.       if(WSAGETASYNCERROR(lParam)!=0) {
  278.         ReportWSError(WSAGETASYNCERROR(lParam));
  279.         SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  280.       } else {
  281.         memcpy(&ProtoEntry,&szMsgBuf[MAXGETHOSTSTRUCT],
  282.                      sizeof(struct protoent));
  283.         hATHprot=0;
  284.         if(hATHhost==0) SendMessage(hWnd,WM_PING_CAS,0,0l);
  285.       }
  286.       break;
  287.  
  288.     case WM_PING_CAS:
  289.       PrintHeader(&saDestAddr,nPktLength+SIZE_ICMP_HDR);
  290.       ping_socket=socket(saDestAddr.sin_family,SOCK_RAW,
  291.                     ProtoEntry.p_proto);
  292.       if(ping_socket==INVALID_SOCKET) {
  293.         DoPrintf("can't create raw socket: %s",
  294.                     ReturnWSError(WSAGetLastError(),NULL));
  295.         SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  296.       } else {
  297.         if(WSAAsyncSelect(ping_socket,hWnd,WM_PING_RECEIVE,FD_READ)
  298.             ==SOCKET_ERROR)
  299.         {
  300.           DoPrintf("asyncselect: %s",ReturnWSError(WSAGetLastError(),NULL));
  301.           ping_socket=DoClose(ping_socket);
  302.           SendMessage(hWnd,WM_RESETCURSOR,0,0l);
  303.         } else {
  304.           nTransmitted=nReceived=0;
  305.           SetTimer(hWndMain,20,1000,NULL);
  306.         }
  307.       }
  308.       break;
  309.  
  310.     case WM_PING_RECEIVE:
  311.       DoPrintf("[WM_PING_RECEIVE] ");
  312.       saFromAddrLen=sizeof(struct sockaddr);
  313.       nBytesRecv=recvfrom(ping_socket,szString,MAXPACKET,0,
  314.                 (struct sockaddr *)&saFromAddr,
  315.                 &saFromAddrLen);
  316.       if(nBytesRecv!=SOCKET_ERROR || WSAGetLastError()!=WSAEINTR) {
  317.         if(nBytesRecv==SOCKET_ERROR) {
  318.           DoPrintf("[recvfrom] %s",ReturnWSError(WSAGetLastError(),NULL));
  319.         } else PrintPkt(szString,nBytesRecv,&saFromAddr,TRUE);
  320.       }
  321.       break;
  322.  
  323.     case WM_PING_FINISH:
  324.       ping_socket=DoClose(ping_socket);
  325.       PrintStats();
  326.  
  327.     case WM_RESETCURSOR:
  328.       bCmdInProgress=0;
  329.       SetCursor(hStdCursor);
  330.       break;
  331.  
  332.     case WM_SETCURSOR:
  333.       if(bCmdInProgress)
  334.         SetCursor(hWaitCursor);
  335.       else
  336.         return DefWindowProc(hWnd, Message, wParam, lParam);
  337.       break;
  338.  
  339.     case WM_PAINT:  // code for the window's client area
  340.       DoPaint(hWnd);
  341.       break;
  342.  
  343.     case WM_VSCROLL:
  344.       switch(wParam)
  345.       {
  346.         case SB_LINEDOWN:
  347.           if(sVPos<(ptrhGMem-1)) sVPos++;
  348.           break;
  349.         case SB_LINEUP:
  350.           if(sVPos>0) --sVPos;
  351.           break;
  352.         case SB_THUMBPOSITION:
  353.           sVPos = min(ptrhGMem, LOWORD(lParam));
  354.           break;
  355.         case SB_PAGEUP:
  356.           if(sVPos>10) sVPos-=10; else sVPos=0;
  357.           break;
  358.         case SB_PAGEDOWN:
  359.           if(sVPos<(ptrhGMem-10)) sVPos+=10; else sVPos=ptrhGMem;
  360.           break;
  361.         default:
  362.           return FALSE;
  363.       }
  364.       SetScrollPos(hWnd,SB_VERT,sVPos,TRUE);
  365.       InvalidateRect(hWnd,NULL,TRUE);
  366.       break;
  367.  
  368.     case WM_CLOSE:  // close the window
  369.       // Destroy child windows, modeless dialogs, then, this window
  370.       if (hWnd == hWndMain) {
  371.         if(ping_socket!=INVALID_SOCKET)
  372.           ping_socket=DoClose(ping_socket);
  373.         DestroyWindow(hWnd);
  374.         WritePrivateProfileString("WS_PING", "HOSTNAME",szRemoteHost,
  375.                      szIniFile);
  376.         PostQuitMessage(0);  // Quit the application
  377.       } else
  378.         DestroyWindow(hWnd);
  379.       break;
  380.  
  381.     default:
  382.       return DefWindowProc(hWnd, Message, wParam, lParam);
  383.   }
  384.   return 0L;
  385. } // End of WndProc
  386.  
  387. /************************************************************************/
  388. /* Misc Dialog Window Procedures                                        */
  389. /************************************************************************/
  390. BOOL FAR PASCAL WS_AboutMsgProc(HWND hWndDlg, WORD Message, 
  391.                                 WORD wParam, LONG lParam)
  392. { 
  393.  switch(Message)
  394.  {
  395.    case WM_INITDIALOG:
  396.      cwCenter(hWndDlg, 0);
  397.      break;
  398.    case WM_CLOSE:
  399.      PostMessage(hWndDlg, WM_COMMAND, IDCANCEL, 0L);
  400.      break;
  401.    case WM_COMMAND:
  402.      switch(wParam)
  403.      {
  404.        case IDOK:
  405.          EndDialog(hWndDlg, TRUE);
  406.          break;
  407.        case IDCANCEL:
  408.          EndDialog(hWndDlg, FALSE);
  409.          break;
  410.      }
  411.      break;
  412.     default:
  413.         return FALSE;
  414.   }
  415.   return TRUE;
  416. }
  417.  
  418. BOOL FAR PASCAL WS_HostMsgProc(HWND hWndDlg, WORD Message,
  419.                                 WORD wParam, LONG lParam)
  420. {
  421.   BOOL lpfTranslated;
  422.    
  423.   switch(Message)
  424.   {
  425.     case WM_INITDIALOG:
  426.       SetDlgItemText(hWndDlg,DLG_HOST_NAME,szRemoteHost);
  427.       SetDlgItemInt(hWndDlg,DLG_HOST_NUMPKTS,nNumPkts,FALSE);
  428.       SetDlgItemInt(hWndDlg,DLG_HOST_PKTLENGTH,nPktLength,FALSE);
  429.       SetDlgItemInt(hWndDlg,DLG_HOST_TIMEOUT,nTimeOut,FALSE);
  430.       CheckDlgButton(hWndDlg,DLG_HOST_VERBOSE,bVerbose);
  431.       cwCenter(hWndDlg, 0);
  432.       break;
  433.     case WM_CLOSE:
  434.       PostMessage(hWndDlg, WM_COMMAND, IDCANCEL, 0L);
  435.       break;
  436.     case WM_COMMAND:
  437.       switch(wParam)
  438.       {
  439.         case IDOK:
  440.           GetDlgItemText(hWndDlg,DLG_HOST_NAME,szRemoteHost,70);
  441.           nNumPkts=GetDlgItemInt(hWndDlg,DLG_HOST_NUMPKTS,
  442.                              &lpfTranslated,FALSE);
  443.           nPktLength=GetDlgItemInt(hWndDlg,DLG_HOST_PKTLENGTH,
  444.                              &lpfTranslated,FALSE);
  445.           nTimeOut=GetDlgItemInt(hWndDlg,DLG_HOST_TIMEOUT,
  446.                              &lpfTranslated,FALSE);
  447.           bVerbose=IsDlgButtonChecked(hWndDlg,DLG_HOST_VERBOSE);
  448.           if((nPktLength+SIZE_ICMP_HDR)>512) nPktLength=512-SIZE_ICMP_HDR;
  449.           EndDialog(hWndDlg, TRUE);
  450.           break;
  451.         case IDCANCEL:
  452.           EndDialog(hWndDlg, FALSE);
  453.           break;
  454.       }
  455.       break;
  456.     default:
  457.       return FALSE;
  458.   }
  459.   return TRUE;
  460. }
  461.  
  462. BOOL FAR PASCAL WS_InputMsgProc(HWND hWndDlg, WORD Message,
  463.                                 WORD wParam, LONG lParam)
  464. { 
  465.   switch(Message)
  466.   {
  467.     case WM_INITDIALOG:
  468.       SetDlgItemText(hWndDlg,DLG_PROMPT,szDlgPrompt);
  469.       SetDlgItemText(hWndDlg,DLG_EDIT,szDlgEdit);
  470.       cwCenter(hWndDlg, 0);
  471.       break;
  472.     case WM_CLOSE:
  473.       PostMessage(hWndDlg, WM_COMMAND, IDCANCEL, 0L);
  474.       break;
  475.     case WM_COMMAND:
  476.       switch(wParam)
  477.       {
  478.         case IDOK:
  479.           GetDlgItemText(hWndDlg,DLG_EDIT,szDlgEdit,70);
  480.           EndDialog(hWndDlg, TRUE);
  481.           break;
  482.         case IDCANCEL:
  483.           EndDialog(hWndDlg, FALSE);
  484.           break;
  485.       }
  486.       break;
  487.     default:
  488.       return FALSE;
  489.   }
  490.   return TRUE;
  491. }
  492.  
  493. int nCwRegisterClasses(void)
  494. {
  495.   WNDCLASS   wndclass;    // struct to define a window class
  496.   memset(&wndclass, 0x00, sizeof(WNDCLASS));
  497.  
  498.   wndclass.style = CS_HREDRAW | CS_VREDRAW | CS_BYTEALIGNWINDOW;
  499.   wndclass.lpfnWndProc = WndProc;
  500.   wndclass.cbClsExtra = 0;
  501.   wndclass.cbWndExtra = 0;
  502.   wndclass.hInstance = hInst;
  503.   wndclass.hIcon = LoadIcon(hInst, "WS_PING");
  504.   wndclass.hCursor = LoadCursor(NULL, IDC_ARROW);
  505.   wndclass.hbrBackground = (HBRUSH) CreateSolidBrush(RGB(128, 128, 128));
  506.   wndclass.lpszMenuName = szAppName;
  507.   wndclass.lpszClassName = szAppName;
  508.   if(!RegisterClass(&wndclass))
  509.     return -1;
  510.   return(0);
  511. }
  512.  
  513. void cwCenter(hWnd, top)
  514. HWND hWnd;
  515. int top;
  516. {
  517.   POINT      pt;
  518.   RECT       swp;
  519.   RECT       rParent;
  520.   int        iwidth;
  521.   int        iheight;
  522.  
  523.   GetWindowRect(hWnd, &swp);
  524.   GetClientRect(hWndMain, &rParent);
  525.   iwidth = swp.right - swp.left;
  526.   iheight = swp.bottom - swp.top;
  527.   pt.x = (rParent.right - rParent.left) / 2;
  528.   pt.y = (rParent.bottom - rParent.top) / 2;
  529.   ClientToScreen(hWndMain, &pt);
  530.   pt.x = pt.x - (iwidth / 2);
  531.   pt.y = pt.y - (iheight / 2);
  532.   if(top)
  533.     pt.y = pt.y + top;
  534.   MoveWindow(hWnd, pt.x, pt.y, iwidth, iheight, FALSE);
  535. }
  536.  
  537. void CwUnRegisterClasses(void)
  538. {
  539.   WNDCLASS   wndclass;
  540.   memset(&wndclass, 0x00, sizeof(WNDCLASS));
  541.   GetClassInfo(hInst, szAppName, &wndclass);
  542.   DeleteObject(wndclass.hbrBackground);
  543.   UnregisterClass(szAppName, hInst);
  544. }
  545.  
  546.